home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 September
/
CHIP Eylül 1998.iso
/
demolar
/
lokman
/
DISK1
/
_SETUP.2
/
Group1
/
Tarihdll.dll
/
0
/
RCDATA
/
TRTANIMFORM
/
TRTANIMFORM.txt
Wrap
Text File
|
1998-07-24
|
48KB
|
1,907 lines
object RTanimForm: TRTanimForm
Left = 0
Top = 1
Width = 640
Height = 456
Caption = 'Re�ete Arkas� Tan�mlama'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel2: TPanel
Left = 202
Top = 0
Width = 430
Height = 235
Align = alClient
BevelInner = bvLowered
BorderWidth = 3
Caption = 'Panel2'
Color = clYellow
TabOrder = 0
object ScrollBox: TScrollBox
Left = 5
Top = 5
Width = 420
Height = 225
HorzScrollBar.Margin = 6
VertScrollBar.Margin = 6
Align = alClient
BorderStyle = bsNone
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label17: TLabel
Left = 3
Top = 32
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '1.BA�LIK'
end
object Label18: TLabel
Left = 3
Top = 53
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '2.BA�LIK'
end
object Label19: TLabel
Left = 3
Top = 74
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '3.BA�LIK'
end
object Label20: TLabel
Left = 3
Top = 95
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '4.BA�LIK'
end
object Label21: TLabel
Left = 3
Top = 116
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '5.BA�LIK'
end
object Label22: TLabel
Left = 3
Top = 137
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '6.BA�LIK'
end
object Label23: TLabel
Left = 3
Top = 158
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '7.BA�LIK'
end
object Label24: TLabel
Left = 3
Top = 179
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '8.BA�LIK'
end
object Label25: TLabel
Left = 3
Top = 200
Width = 54
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '9.BA�LIK'
end
object Label35: TLabel
Left = 328
Top = 14
Width = 81
Height = 14
Caption = 'GEN��L�K (mm)'
Color = clSilver
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentColor = False
ParentFont = False
end
object Label1: TLabel
Left = 63
Top = 14
Width = 98
Height = 14
Caption = ' BA�LIK ��ER��� '
Color = clSilver
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentColor = False
ParentFont = False
end
object Label16: TLabel
Left = 252
Top = 14
Width = 48
Height = 14
Alignment = taCenter
Caption = ' BA�LIK '
Color = clSilver
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentColor = False
ParentFont = False
end
object Label5: TLabel
Left = 0
Top = 0
Width = 420
Height = 14
Align = alTop
Alignment = taCenter
Caption = 'HASTAYA A�T BA�LIKLAR'
Color = clTeal
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object EditGEN2: TDBEdit
Left = 344
Top = 50
Width = 55
Height = 22
DataField = 'GENIS2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object EditGEN3: TDBEdit
Left = 344
Top = 71
Width = 55
Height = 22
DataField = 'GENIS3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 8
end
object EditGEN4: TDBEdit
Left = 344
Top = 92
Width = 55
Height = 22
DataField = 'GENIS4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 11
end
object EditGEN5: TDBEdit
Left = 344
Top = 113
Width = 55
Height = 22
DataField = 'GENIS5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 14
end
object EditGEN6: TDBEdit
Left = 344
Top = 134
Width = 55
Height = 22
DataField = 'GENIS6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 17
end
object EditGEN7: TDBEdit
Left = 344
Top = 155
Width = 55
Height = 22
DataField = 'GENIS7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 20
end
object EditGEN8: TDBEdit
Left = 344
Top = 176
Width = 55
Height = 22
DataField = 'GENIS8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 23
end
object EditGEN9: TDBEdit
Left = 344
Top = 197
Width = 55
Height = 22
DataField = 'GENIS9'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 26
end
object EditGEN1: TDBEdit
Left = 344
Top = 29
Width = 55
Height = 22
DataField = 'GENIS1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 2
end
object DBComboBox1: TDBComboBox
Left = 60
Top = 28
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN1'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 0
OnExit = DBComboBox1Exit
end
object DBComboBox2: TDBComboBox
Left = 60
Top = 49
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN2'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 3
OnExit = DBComboBox1Exit
end
object DBComboBox3: TDBComboBox
Left = 60
Top = 70
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN3'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 6
OnExit = DBComboBox1Exit
end
object DBComboBox4: TDBComboBox
Left = 60
Top = 91
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN4'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 9
OnExit = DBComboBox1Exit
end
object DBComboBox5: TDBComboBox
Left = 60
Top = 112
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN5'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 12
OnExit = DBComboBox1Exit
end
object DBComboBox6: TDBComboBox
Left = 60
Top = 133
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN6'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 15
OnExit = DBComboBox1Exit
end
object DBComboBox7: TDBComboBox
Left = 60
Top = 154
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN7'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 18
OnExit = DBComboBox1Exit
end
object DBComboBox8: TDBComboBox
Left = 60
Top = 175
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN8'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 21
OnExit = DBComboBox1Exit
end
object DBComboBox9: TDBComboBox
Left = 60
Top = 196
Width = 145
Height = 22
Style = csDropDownList
DataField = 'ALAN9'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'ADI SOYADI'
'1. BA�LIK'
'2. BA�LIK'
'3. BA�LIK'
'4. BA�LIK'
'5. BA�LIK'
'6. BA�LIK'
'PROTOKOL NO'
'�LA� ALINI� TAR�H�'
'RE�ETE TAR�H�'
'V�ZE TAR�H�'
'�LA�LARDA %'
'�LA� BERABER� %'
'�ZEL KATILIM %'
'�THAL �LA�LAR %'
'RAP.LU �THAL �LA�LAR %'
'HASTA KAT. PAY.'
'RE�ETE NET TUTARI'
'RE�ETE BR�T TUTARI'
'FATURA TAR�H�'
'R.K.Defter No'
'FATURA NO'
'SER� NO'
'')
TabOrder = 24
OnExit = DBComboBox1Exit
end
object DBEdit1: TDBEdit
Left = 213
Top = 29
Width = 121
Height = 22
DataField = 'CAPTION1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 213
Top = 50
Width = 121
Height = 22
DataField = 'CAPTION2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 4
end
object DBEdit3: TDBEdit
Left = 213
Top = 71
Width = 121
Height = 22
DataField = 'CAPTION3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 7
end
object DBEdit4: TDBEdit
Left = 213
Top = 92
Width = 121
Height = 22
DataField = 'CAPTION4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 10
end
object DBEdit5: TDBEdit
Left = 213
Top = 113
Width = 121
Height = 22
DataField = 'CAPTION5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 13
end
object DBEdit6: TDBEdit
Left = 213
Top = 134
Width = 121
Height = 22
DataField = 'CAPTION6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 16
end
object DBEdit7: TDBEdit
Left = 213
Top = 155
Width = 121
Height = 22
DataField = 'CAPTION7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 19
end
object DBEdit8: TDBEdit
Left = 213
Top = 176
Width = 121
Height = 22
DataField = 'CAPTION8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 22
end
object DBEdit9: TDBEdit
Left = 213
Top = 196
Width = 121
Height = 22
DataField = 'CAPTION9'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 25
end
object ListBox1: TListBox
Left = 280
Top = 72
Width = 57
Height = 186
ItemHeight = 14
Items.Strings = (
'HASTANO'
'BAS1'
'BAS2'
'BAS3'
'BAS4'
'BAS5'
'BAS6'
'PROTOKOLNO'
'ALTARIH'
'RECTARIH'
'VIZETRH'
'BRUTN'
'BRUTI'
'BRUTO'
'BRUTH'
'BRUTMR'
'HKPson'
'NETSON'
'BRUT'
'FATARIH'
'RKDEFTERNO'
'FATURANO'
'SERINO'
'')
TabOrder = 27
Visible = False
end
end
end
object Panel3: TPanel
Left = 0
Top = 235
Width = 632
Height = 194
Align = alBottom
BevelInner = bvLowered
BorderWidth = 1
Caption = 'Panel3'
Color = clYellow
TabOrder = 1
object ScrollBox1: TScrollBox
Left = 3
Top = 3
Width = 626
Height = 188
Align = alClient
BorderStyle = bsNone
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label4: TLabel
Left = 0
Top = 0
Width = 57
Height = 188
Align = alLeft
Alignment = taCenter
AutoSize = False
Caption = '�LA�LARA A�T B�LG�LER'
Color = clTeal
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
WordWrap = True
end
object Label6: TLabel
Left = 60
Top = 18
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '1.KOLON'
end
object Label7: TLabel
Left = 60
Top = 39
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '2.KOLON'
end
object Label8: TLabel
Left = 60
Top = 60
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '3.KOLON'
end
object Label9: TLabel
Left = 61
Top = 81
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '4.KOLON'
end
object Label10: TLabel
Left = 61
Top = 102
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '5.KOLON'
end
object Label11: TLabel
Left = 130
Top = 0
Width = 93
Height = 14
Caption = ' KOLON ��ER��� '
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label12: TLabel
Left = 265
Top = 0
Width = 113
Height = 14
Alignment = taCenter
Caption = ' KOLON BA�LI�I ADI '
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label15: TLabel
Left = 61
Top = 123
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '6.KOLON'
end
object Label13: TLabel
Left = 385
Top = 0
Width = 81
Height = 14
Caption = 'GEN��L�K (mm)'
Color = clSilver
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentColor = False
ParentFont = False
end
object Label26: TLabel
Left = 61
Top = 145
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '7.KOLON'
end
object Label14: TLabel
Left = 455
Top = 20
Width = 148
Height = 14
Alignment = taCenter
Caption = 'HASTA BA�LIK ALTI B�LG�S�'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object Label27: TLabel
Left = 60
Top = 166
Width = 55
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '8.KOLON'
end
object DBComboBoxT1: TDBComboBox
Left = 118
Top = 14
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN1'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 0
end
object DBComboBoxT2: TDBComboBox
Left = 118
Top = 35
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN2'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 3
end
object DBComboBoxT3: TDBComboBox
Left = 118
Top = 56
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN3'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 6
end
object EditB1: TDBEdit
Left = 265
Top = 15
Width = 121
Height = 22
DataField = 'B_CAPTION1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 1
end
object EditB2: TDBEdit
Left = 265
Top = 36
Width = 121
Height = 22
DataField = 'B_CAPTION2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 4
end
object EditB3: TDBEdit
Left = 265
Top = 57
Width = 121
Height = 22
DataField = 'B_CAPTION3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 7
end
object DBComboBoxT4: TDBComboBox
Left = 118
Top = 77
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN4'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 9
end
object DBComboBoxT5: TDBComboBox
Left = 118
Top = 98
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN5'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 12
end
object EditB4: TDBEdit
Left = 265
Top = 78
Width = 121
Height = 22
DataField = 'B_CAPTION4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 10
end
object EditB5: TDBEdit
Left = 265
Top = 99
Width = 121
Height = 22
DataField = 'B_CAPTION5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 13
end
object EGenis2: TDBEdit
Left = 392
Top = 37
Width = 48
Height = 22
DataField = 'B_GENIS2'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object EGenis3: TDBEdit
Left = 392
Top = 58
Width = 48
Height = 22
DataField = 'B_GENIS3'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 8
end
object EGenis4: TDBEdit
Left = 392
Top = 79
Width = 48
Height = 22
DataField = 'B_GENIS4'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 11
end
object EGenis5: TDBEdit
Left = 392
Top = 100
Width = 48
Height = 22
DataField = 'B_GENIS5'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 14
end
object EGenis1: TDBEdit
Left = 392
Top = 16
Width = 48
Height = 22
DataField = 'B_GENIS1'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 2
end
object DBComboBoxT6: TDBComboBox
Left = 118
Top = 119
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN6'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 15
end
object EditB6: TDBEdit
Left = 265
Top = 120
Width = 121
Height = 22
DataField = 'B_CAPTION6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 16
end
object EGenis6: TDBEdit
Left = 392
Top = 121
Width = 48
Height = 22
DataField = 'B_GENIS6'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 17
end
object DBComboBoxT7: TDBComboBox
Left = 118
Top = 140
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN7'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 18
end
object EditB7: TDBEdit
Left = 265
Top = 141
Width = 121
Height = 22
DataField = 'B_CAPTION7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 19
end
object EGenis7: TDBEdit
Left = 392
Top = 142
Width = 48
Height = 22
DataField = 'B_GENIS7'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 20
end
object DBRadioGroup1: TDBRadioGroup
Left = 450
Top = 37
Width = 161
Height = 74
Caption = 'Ba�l�k Alt� Toplamlar�'
DataField = 'TOPVERNE'
DataSource = DS_KOLONB
Items.Strings = (
'(Kalem+ kutu)�la�'
'Enjek.+(Kalem+kutu)�la�'
'Hi�biri')
TabOrder = 24
Values.Strings = (
'K'
'E'
'H')
end
object ListBoxT: TListBox
Left = 501
Top = 14
Width = 71
Height = 113
ItemHeight = 14
Items.Strings = (
'SIRANOURUN'
'ILAD'
'BARKOD'
'MIKTAR'
'FIYAT'
'bN'
'bI'
'bO'
'bH'
'bMR'
'bNTUT'
'bITUT'
'bOTUT'
'bHTUT'
'bMRTUT'
'BRUTUTAR'
'')
TabOrder = 26
Visible = False
end
object DBRadioGroup2: TDBRadioGroup
Left = 450
Top = 120
Width = 161
Height = 51
Caption = '�LA� SE�ENE��'
DataField = 'ILACVARMI'
DataSource = DS_KOLONB
Items.Strings = (
'�la� Bilgilerini Yazd�r'
'�la� Bilgilerini Yazd�rma')
TabOrder = 25
Values.Strings = (
'E'
'H')
end
object DBComboBoxT8: TDBComboBox
Left = 118
Top = 161
Width = 145
Height = 22
Style = csDropDownList
DataField = 'B_ALAN8'
DataSource = DS_KOLONB
ItemHeight = 14
Items.Strings = (
'�LA� SIRA NO'
'�LA� ADI'
'�LA� BARKODU'
'�LA� M�KTAR'
'�LA� F�YATI'
'�LA�LARDA % Fiyat�'
'�LA� BERABER� % Fiyat�'
'�ZEL KATILIM % Fiyat�'
'�THAL �LA� % Fiyat�'
'RAP.LU �THAL �LA� % Fiyat�'
'�LA�LARDA % TUTARI'
'�LA� BERABER� % TUTARI'
'�ZEL KATILIM % TUTARI'
'�THAL �LA� % TUTARI'
'RAP.LU �THAL �LA� % TUTARI'
'�LA� BR�T TUTARI'
'')
TabOrder = 21
end
object EditB8: TDBEdit
Left = 265
Top = 162
Width = 121
Height = 22
DataField = 'B_CAPTION8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 22
end
object EGenis8: TDBEdit
Left = 392
Top = 163
Width = 48
Height = 22
DataField = 'B_GENIS8'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 23
end
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 202
Height = 235
Align = alLeft
BevelInner = bvLowered
BorderWidth = 3
Caption = 'Panel4'
Color = clYellow
TabOrder = 2
object ScrollBox2: TScrollBox
Left = 5
Top = 5
Width = 192
Height = 225
Align = alClient
BorderStyle = bsNone
Color = clTeal
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object Label2: TLabel
Left = 5
Top = 0
Width = 70
Height = 14
Caption = 'KURUM KODU'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedBKK: TSpeedButton
Left = 106
Top = 16
Width = 22
Height = 20
Hint = 'Kurum Listesi'
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333FBFFF
FFFFF000000033333333FBBFFFFBF00000003333333FBFFFFBFFFE0000003333
333FBFFFFBFBF600000033333333FBBFFFFFF70000003333333444FBFFFBF600
000033333344834FBFFFF1000000333334847F84BFFFF6000000333334484F84
FBBFB00000003333348F74483FF3F6000000333344FFF7433333300000003344
8F8444333333300000003448F7433333333330000000348F7733333333333000
000034F77433333333333F000000344443333333333330000000333333333333
333337000000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedBKKClick
end
object Label3: TLabel
Left = 97
Top = 85
Width = 57
Height = 28
Caption = 'Yaz�c� Sol Marj (mm)'
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
end
object BtnSAKLA: TBitBtn
Left = 6
Top = 194
Width = 85
Height = 25
Caption = '&Sakla'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BtnSAKLAClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
59905555555555555777555555555555555555555555555555550000}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 100
Top = 194
Width = 85
Height = 25
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Kind = bkClose
end
object BitBtn2: TBitBtn
Left = 6
Top = 157
Width = 85
Height = 25
Caption = '&Re�.Fontu'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FF3FFFFFFF33FFF003000000033
0000773777777733777703330033033330037FFF77F37F33377F700007330333
3003777777337FFFF77F303003337000007337F77F3377777773303073333033
003337F77F3337F377F337007333303300333777733337FF77F3330033333703
07333377F333377F7733330733333300033333773FF3F3777F33333399393300
033333337737FF777F333333339993307333333333777FF77333333333999930
3333333333777737333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object EditKURUMKOD: TDBEdit
Left = 3
Top = 14
Width = 97
Height = 22
DataField = 'KURUMKOD'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 3
OnChange = EditKURUMKODChange
OnExit = EditKURUMKODExit
end
object DBRadioGrH: TDBRadioGroup
Left = 5
Top = 43
Width = 81
Height = 97
Caption = 'HastaTipi'
Color = clSilver
DataField = 'HASTATIP'
DataSource = DS_KOLONB
Items.Strings = (
'�al��an'
'Emekli'
'Rap./Yat.'
'Normal'
'Di�er')
ParentColor = False
TabOrder = 4
Values.Strings = (
'�'
'E'
'R'
'N'
'D')
end
object EditMARJIN: TDBEdit
Left = 95
Top = 117
Width = 52
Height = 22
DataField = 'MARJIN'
DataSource = DS_KOLONB
MaxLength = 0
TabOrder = 5
end
object BitBtn3: TBitBtn
Left = 100
Top = 157
Width = 85
Height = 25
HelpContext = 139
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 6
Kind = bkHelp
end
end
end
object TabKOLONB: TTable
BeforePost = TabKOLONBBeforePost
DatabaseName = 'ECZ'
TableName = 'recarka.db'
Left = 382
Top = 166
object TabKOLONBKURUMKOD: TStringField
FieldName = 'KURUMKOD'
Size = 11
end
object TabKOLONBHASTATIP: TStringField
FieldName = 'HASTATIP'
Size = 1
end
object TabKOLONBFONTADI: TStringField
FieldName = 'FONTADI'
Size = 35
end
object TabKOLONBSIZE: TSmallintField
FieldName = 'SIZE'
end
object TabKOLONBSTYLE: TStringField
FieldName = 'STYLE'
Size = 1
end
object TabKOLONBCOLOR: TIntegerField
FieldName = 'COLOR'
end
object TabKOLONBMARJIN: TSmallintField
FieldName = 'MARJIN'
end
object TabKOLONBALAN1: TStringField
FieldName = 'ALAN1'
Size = 25
end
object TabKOLONBCAPTION1: TStringField
FieldName = 'CAPTION1'
Size = 35
end
object TabKOLONBDATA1: TStringField
FieldName = 'DATA1'
Size = 21
end
object TabKOLONBGENIS1: TSmallintField
FieldName = 'GENIS1'
end
object TabKOLONBALAN2: TStringField
FieldName = 'ALAN2'
Size = 25
end
object TabKOLONBCAPTION2: TStringField
FieldName = 'CAPTION2'
Size = 35
end
object TabKOLONBDATA2: TStringField
FieldName = 'DATA2'
Size = 21
end
object TabKOLONBGENIS2: TSmallintField
FieldName = 'GENIS2'
end
object TabKOLONBALAN3: TStringField
FieldName = 'ALAN3'
Size = 25
end
object TabKOLONBCAPTION3: TStringField
FieldName = 'CAPTION3'
Size = 35
end
object TabKOLONBDATA3: TStringField
FieldName = 'DATA3'
Size = 21
end
object TabKOLONBGENIS3: TSmallintField
FieldName = 'GENIS3'
end
object TabKOLONBALAN4: TStringField
FieldName = 'ALAN4'
Size = 25
end
object TabKOLONBCAPTION4: TStringField
FieldName = 'CAPTION4'
Size = 35
end
object TabKOLONBDATA4: TStringField
FieldName = 'DATA4'
Size = 21
end
object TabKOLONBGENIS4: TSmallintField
FieldName = 'GENIS4'
end
object TabKOLONBALAN5: TStringField
FieldName = 'ALAN5'
Size = 25
end
object TabKOLONBCAPTION5: TStringField
FieldName = 'CAPTION5'
Size = 35
end
object TabKOLONBDATA5: TStringField
FieldName = 'DATA5'
Size = 21
end
object TabKOLONBGENIS5: TSmallintField
FieldName = 'GENIS5'
end
object TabKOLONBALAN6: TStringField
FieldName = 'ALAN6'
Size = 25
end
object TabKOLONBCAPTION6: TStringField
FieldName = 'CAPTION6'
Size = 35
end
object TabKOLONBDATA6: TStringField
FieldName = 'DATA6'
Size = 21
end
object TabKOLONBGENIS6: TSmallintField
FieldName = 'GENIS6'
end
object TabKOLONBALAN7: TStringField
FieldName = 'ALAN7'
Size = 25
end
object TabKOLONBCAPTION7: TStringField
FieldName = 'CAPTION7'
Size = 35
end
object TabKOLONBDATA7: TStringField
FieldName = 'DATA7'
Size = 21
end
object TabKOLONBGENIS7: TSmallintField
FieldName = 'GENIS7'
end
object TabKOLONBALAN8: TStringField
FieldName = 'ALAN8'
Size = 25
end
object TabKOLONBCAPTION8: TStringField
FieldName = 'CAPTION8'
Size = 35
end
object TabKOLONBDATA8: TStringField
FieldName = 'DATA8'
Size = 21
end
object TabKOLONBGENIS8: TSmallintField
FieldName = 'GENIS8'
end
object TabKOLONBALAN9: TStringField
FieldName = 'ALAN9'
Size = 25
end
object TabKOLONBCAPTION9: TStringField
FieldName = 'CAPTION9'
Size = 35
end
object TabKOLONBDATA9: TStringField
FieldName = 'DATA9'
Size = 21
end
object TabKOLONBGENIS9: TSmallintField
FieldName = 'GENIS9'
end
object TabKOLONBB_ALAN1: TStringField
FieldName = 'B_ALAN1'
Size = 25
end
object TabKOLONBB_CAPTION1: TStringField
FieldName = 'B_CAPTION1'
Size = 35
end
object TabKOLONBB_DATA1: TStringField
FieldName = 'B_DATA1'
Size = 21
end
object TabKOLONBB_GENIS1: TSmallintField
FieldName = 'B_GENIS1'
end
object TabKOLONBB_ALAN2: TStringField
FieldName = 'B_ALAN2'
Size = 25
end
object TabKOLONBB_CAPTION2: TStringField
FieldName = 'B_CAPTION2'
Size = 35
end
object TabKOLONBB_DATA2: TStringField
FieldName = 'B_DATA2'
Size = 21
end
object TabKOLONBB_GENIS2: TSmallintField
FieldName = 'B_GENIS2'
end
object TabKOLONBB_ALAN3: TStringField
FieldName = 'B_ALAN3'
Size = 25
end
object TabKOLONBB_CAPTION3: TStringField
FieldName = 'B_CAPTION3'
Size = 35
end
object TabKOLONBB_DATA3: TStringField
FieldName = 'B_DATA3'
Size = 21
end
object TabKOLONBB_GENIS3: TSmallintField
FieldName = 'B_GENIS3'
end
object TabKOLONBB_ALAN4: TStringField
FieldName = 'B_ALAN4'
Size = 25
end
object TabKOLONBB_CAPTION4: TStringField
FieldName = 'B_CAPTION4'
Size = 35
end
object TabKOLONBB_DATA4: TStringField
FieldName = 'B_DATA4'
Size = 21
end
object TabKOLONBB_GENIS4: TSmallintField
FieldName = 'B_GENIS4'
end
object TabKOLONBB_ALAN5: TStringField
FieldName = 'B_ALAN5'
Size = 25
end
object TabKOLONBB_CAPTION5: TStringField
FieldName = 'B_CAPTION5'
Size = 35
end
object TabKOLONBB_DATA5: TStringField
FieldName = 'B_DATA5'
Size = 21
end
object TabKOLONBB_GENIS5: TSmallintField
FieldName = 'B_GENIS5'
end
object TabKOLONBB_ALAN6: TStringField
FieldName = 'B_ALAN6'
Size = 25
end
object TabKOLONBB_CAPTION6: TStringField
FieldName = 'B_CAPTION6'
Size = 35
end
object TabKOLONBB_DATA6: TStringField
FieldName = 'B_DATA6'
Size = 21
end
object TabKOLONBB_GENIS6: TSmallintField
FieldName = 'B_GENIS6'
end
object TabKOLONBB_ALAN7: TStringField
FieldName = 'B_ALAN7'
Size = 25
end
object TabKOLONBB_CAPTION7: TStringField
FieldName = 'B_CAPTION7'
Size = 35
end
object TabKOLONBB_DATA7: TStringField
FieldName = 'B_DATA7'
Size = 21
end
object TabKOLONBB_GENIS7: TSmallintField
FieldName = 'B_GENIS7'
end
object TabKOLONBTOPVERNE: TStringField
FieldName = 'TOPVERNE'
Size = 1
end
object TabKOLONBILACVARMI: TStringField
FieldName = 'ILACVARMI'
Size = 1
end
object TabKOLONBB_ALAN8: TStringField
FieldName = 'B_ALAN8'
Size = 25
end
object TabKOLONBB_CAPTION8: TStringField
FieldName = 'B_CAPTION8'
Size = 35
end
object TabKOLONBB_DATA8: TStringField
FieldName = 'B_DATA8'
Size = 21
end
object TabKOLONBB_GENIS8: TSmallintField
FieldName = 'B_GENIS8'
end
end
object DS_KOLONB: TDataSource
DataSet = TabKOLONB
Left = 414
Top = 166
end
object T_KRMLAR: TTable
DatabaseName = 'ECZ'
ReadOnly = True
TableName = 'Krmlar.DB'
Left = 166
Top = 110
object T_KRMLARKOD: TStringField
FieldName = 'KOD'
Size = 11
end
object T_KRMLARETIKET1: TStringField
FieldName = 'ETIKET1'
Size = 17
end
object T_KRMLARETIKET2: TStringField
FieldName = 'ETIKET2'
Size = 17
end
object T_KRMLARETIKET3: TStringField
FieldName = 'ETIKET3'
Size = 17
end
object T_KRMLARETIKET4: TStringField
FieldName = 'ETIKET4'
Size = 17
end
object T_KRMLARETIKET5: TStringField
FieldName = 'ETIKET5'
Size = 17
end
object T_KRMLARETIKET6: TStringField
FieldName = 'ETIKET6'
Size = 17
end
end
object FontDialog1: TFontDialog
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 302
Top = 167
end
end